home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / intro.dxr / 00024_ScriptLoop.ls < prev    next >
Encoding:
Text File  |  1996-03-21  |  1.9 KB  |  67 lines
  1. on exitFrame
  2.   if (the mouseCast = 22) or (the mouseCast = 38) then
  3.     if the visible of sprite 2 = 0 then
  4.       set the visible of sprite 2 to 1
  5.     end if
  6.   else
  7.     set the visible of sprite 2 to 0
  8.   end if
  9.   if (the mouseCast = 25) or (the mouseCast = 39) then
  10.     if the visible of sprite 3 = 0 then
  11.       sound playFile 2, "..\som\sector.wav"
  12.       set the visible of sprite 3 to 1
  13.     end if
  14.   else
  15.     set the visible of sprite 3 to 0
  16.   end if
  17.   if (the mouseCast = 26) or (the mouseCast = 40) then
  18.     if the visible of sprite 4 = 0 then
  19.       sound playFile 2, "..\som\sector.wav"
  20.       set the visible of sprite 4 to 1
  21.     end if
  22.   else
  23.     set the visible of sprite 4 to 0
  24.   end if
  25.   if (the mouseCast = 27) or (the mouseCast = 41) then
  26.     if the visible of sprite 5 = 0 then
  27.       sound playFile 2, "..\som\sector.wav"
  28.       set the visible of sprite 5 to 1
  29.     end if
  30.   else
  31.     set the visible of sprite 5 to 0
  32.   end if
  33.   if (the mouseCast = 28) or (the mouseCast = 42) then
  34.     if the visible of sprite 6 = 0 then
  35.       sound playFile 2, "..\som\sector.wav"
  36.       set the visible of sprite 6 to 1
  37.     end if
  38.   else
  39.     set the visible of sprite 6 to 0
  40.   end if
  41.   if (the mouseCast = 29) or (the mouseCast = 43) then
  42.     if the visible of sprite 7 = 0 then
  43.       sound playFile 2, "..\som\sector.wav"
  44.       set the visible of sprite 7 to 1
  45.     end if
  46.   else
  47.     set the visible of sprite 7 to 0
  48.   end if
  49.   if (the mouseCast = 30) or (the mouseCast = 49) then
  50.     if the visible of sprite 8 = 0 then
  51.       sound playFile 2, "..\som\sector.wav"
  52.       set the visible of sprite 8 to 1
  53.     end if
  54.   else
  55.     set the visible of sprite 8 to 0
  56.   end if
  57.   if (the mouseCast = 47) or (the mouseCast = 50) then
  58.     if the visible of sprite 16 = 0 then
  59.       sound playFile 2, "..\som\sector.wav"
  60.       set the visible of sprite 16 to 1
  61.     end if
  62.   else
  63.     set the visible of sprite 16 to 0
  64.   end if
  65.   go("PLoop")
  66. end
  67.